﻿

    function exportToWord(controlId)
    {
        var control = document.getElementById(controlId);
        try
   {
    var oWD = new ActiveXObject("Word.Application"); 
    var oDC = oWD.Documents.Add("",0,1); 
    var oRange =oDC.Range(0,1); 
    var sel=document.body.createTextRange();
    try
    {
       sel.moveToElementText(control);
    }catch(notE)
    {
       alert("导出数据失败，没有数据可以导出。");
       window.close();
       return;
    }
    sel.select();
    sel.execCommand("Copy");
    oRange.Paste();
    oWD.Application.Visible = true;
   
    window.close();
   }
   catch(e)
   {
    alert("1、请确保您的机子上已经安装了Microsoft Office Word 2000(或2003,2007)。2、如果您的机子上已经安装了office，请允许在IE中运行ActiveX控件(IE工具栏—》Internet选项-》“安全”选项卡-》自定义级别)或者将本站加入信任站点。3、具体的设置说明请参考“帮助”系统中“异常管理”的导出异常单");
//    try{oWD.Quit();}catch(ex){}
//    window.close();
   }
    }


